home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 11 / CU Amiga Magazine's Super CD-ROM 11 (1997)(EMAP Images)(GB)(Track 1 of 3)[!][issue 1997-06].iso / initcd < prev    next >
Text File  |  1997-04-25  |  4KB  |  132 lines
  1. ; CUCD Init Script
  2. ;
  3. ; Set up assigns etc. both for users booting from the CD and from  HD
  4. ;
  5. ; Version 1.1 - Changed jpegtmp
  6. ;
  7. ; Version 1.2 - Added uninit option
  8. ;
  9.  
  10. if CDBoot EQ TRUE
  11.     C:NoReset
  12.     endif
  13.  
  14. If $CDInit EQ TRUE
  15.     If $CDBoot EQ TRUE          ; don't run UninitCD if booted from CD
  16.         echo "*NYou do not need to run InitCD when you have booted from the CD"
  17.         Quit
  18.         EndIf
  19.     set remass `RequestChoice "InitCD" "You have already run InitCD once.*NDo you wish to remove the assigns and paths added before?" "Remove|Cancel"`
  20.     If $remass EQ 1
  21.         execute UnInitCD
  22.         EndIf
  23.     Quit
  24.     EndIf
  25.  
  26. Assign CUCD: :
  27.  
  28. ; Set these assigns and paths only if not booting from CD
  29. IF $CDBoot NOT EQ TRUE
  30.     Run >NIL: RequestChoice "InitCD" "Setting up some assigns and paths to run software from the CD.*NIf you wish to remove the CD from the drive, run InitCD again,*Notherwise the icon will stay on the Workbench." " OK "
  31.     SetEnv CDInit TRUE
  32.     Assign Fonts: CUCD:Fonts ADD
  33.     Assign ENV:   CUCD:prefs/env-archive ADD
  34.     Assign Libs:  CUCD:Libs ADD
  35.     Assign L:     CUCD:L ADD
  36.     Assign S:     CUCD:S ADD
  37.     Path CUCD:C CUCD:System CUCD:System/CDsupport CUCD:Utilities CUCD:S CUCD:Rexxc ADD
  38.     EndIF
  39.  
  40. ; Check that libraries on boot drive are up to date
  41. set library rexxdossupport.library
  42. if exists SYS:Libs/$library
  43.     version >NIL: SYS:Libs/$library file version 3 revision 5
  44.     if WARN
  45.         set Update `RequestChoice "Init CD" "You have an old version of $library in LIBS:*NWould you like to install the newer one from the CD?" "Yes|No"`
  46.         if $Update EQ 1
  47.             copy >NIL: CUCD:Libs/$library SYS:Libs
  48.             endif
  49.         endif
  50.     endif
  51.  
  52. set library rexxreqtools.library
  53. if exists SYS:Libs/$library
  54.     version >NIL: SYS:Libs/$library file version 37 revision 95
  55.     if WARN
  56.         set Update `RequestChoice "Init CD" "You have an old version of $library in LIBS:*NWould you like to install the newer one from the CD?" "Yes|No"`
  57.         if $Update EQ 1
  58.             copy >NIL: CUCD:Libs/$library SYS:Libs
  59.             endif
  60.         endif
  61.     endif
  62.  
  63. set library cando.library
  64. if exists SYS:Libs/$library
  65.     version >NIL: SYS:Libs/$library file version 3 revision 8
  66.     if WARN
  67.         set Update `RequestChoice "Init CD" "You have an old version of $library in LIBS:*NWould you like to install the newer one from the CD?" "Yes|No"`
  68.         if $Update EQ 1
  69.             copy >NIL: CUCD:Libs/$library SYS:Libs
  70.             endif
  71.         endif
  72.     endif
  73.  
  74. ; Set some system assigns
  75. Assign CLASSES:            CUCD:Classes ADD
  76. Assign WWW:                CUCD:WWW
  77. Assign CGFonts:            CUCD:ProPage/CGFonts
  78. Assign Spell:              CUCD:ProPage
  79. Assign tcpdldir:           WWW:
  80. Assign HTTPJ:              WWW:http
  81. Assign VMEM:               T:                           ; For SuperView
  82. Assign GM:                 CUCD:System/CDsupport/GMPlay
  83. Assign News:               CUCD:CUCD/Online/News
  84.  
  85. ;BEGIN JPEG Codec
  86. Assign JPEGTMP: EXISTS >NIL:
  87. IF WARN
  88.     Assign JPEGTMP: "T:"
  89.     EndIf
  90. ;END JPEG Codec
  91.  
  92. ; Add paths
  93. Path GM: ADD
  94.  
  95. ; Set path to Delitracker Config.
  96. SetENV DeliConfig "CUCD:System/DeliTracker/DeliConfig"
  97.  
  98. ; Add MUI if no MUI installed.
  99. Assign MUI: EXISTS >NIL:
  100. IF WARN
  101.     Assign MUI:    CUCD:System/MUI
  102.     Assign Libs:   MUI:Libs ADD
  103.     Assign LOCALE: MUI:Locale ADD
  104.     Assign HELP:   MUI:Docs ADD
  105.     EndIf
  106.  
  107.  
  108. ; start arexx
  109. SYS:System/RexxMast >NIL:
  110.  
  111. Run > NIL: CUCD:C/CenterTitles
  112.  
  113. ;BEGIN NewIcons
  114. Status >NIL: com=C:NewIcons
  115. If WARN
  116.     Run <NIL: >NIL: CUCD:C/NewIcons
  117.     CUCD:C/DefIcons
  118.     EndIf
  119. ;END NewIcons
  120.  
  121. ;BEGIN ClassAct
  122. CUCD:C/CAPrefs >NIL:
  123. ;END ClassAct
  124.  
  125. ; Set assigns and paths for programs on this CD
  126. :rexxc/rx :C/MakeAssigns
  127.  
  128. IF $CDBoot NOT EQ TRUE
  129.     LoadWB NEWPATH
  130.     EndIf
  131.  
  132.